home *** CD-ROM | disk | FTP | other *** search
/ The Ultimate Frank Lloyd…ght - America's Architect / Ultimate Frank Lloyd Wright, The - America's Architect (1994)(Microsoft Home).iso / pre / flw / flwlb13.dir / 00177_Script_177 < prev    next >
Text File  |  1994-11-15  |  2KB  |  103 lines
  1. on startMovie
  2.   cursor 4
  3.   global nowFrame, currIntro, currMM
  4.   set currMM = "FLWLB"
  5.   
  6.   global seeAlsoNess
  7.   set seeAlsoNess = FALSE
  8.   
  9.   preLoadCast 1,8
  10.   
  11.   puppetSprite 21, TRUE 
  12.   puppetSprite 22, TRUE
  13.   puppetSprite 23, TRUE
  14.   
  15.   puppetSprite 11, TRUE
  16.   
  17.   set the immediate of sprite 23 to TRUE
  18.   set the stretch of sprite 23 to FALSE
  19. end startMovie
  20.  
  21. on saveLocals
  22.   global lastMovie, lastFrame, nowFrame
  23.   set lastFrame = nowFrame
  24.   set lastMovie = "FLWLB13"
  25. end saveLocals
  26.  
  27. on buttonState
  28.   global FrankNav, bFlag, downOnly, pos
  29.   
  30.   if rollover(11) then
  31.     set the castNum of sprite 11 to 1090
  32.     if the mouseDown then
  33.       set the castNum of sprite 11 to 1091
  34.     end if
  35.   else 
  36.     set the castNum of sprite 11 to 1089
  37.   end if
  38.   
  39.   if rollover(5) then
  40.     rollCheck
  41.   else 
  42.     set pos = 0
  43.     cursor -1
  44.   end if
  45.   
  46.   if (the mouseV > 400) or (bFlag = TRUE) then
  47.     doState
  48.   end if
  49. end buttonState
  50.  
  51. on rollCheck
  52.   global right, left, forw, down, pos, downOnly
  53.   if the mouseH>=257 and the mouseH<=347 and the mouseV>67 and the mouseV<307 then
  54.     if right = 1 then
  55.       set pos = 3
  56.       cursor[1065,1066]
  57.     else if downOnly then
  58.       set pos = 4
  59.       cursor[1073,1074]
  60.     else
  61.       set pos = 0
  62.       cursor[1071,1072]
  63.     end if
  64.   else if the mouseH>=27 and the mouseH<=119 and the mouseV>67 and the mouseV<307 then
  65.     if left = 1 then
  66.       set pos = 1
  67.       cursor[1069,1070]
  68.     else if downOnly then
  69.       set pos = 4
  70.       cursor[1073,1074]
  71.     else
  72.       set pos = 0
  73.       cursor[1071,1072]
  74.     end if
  75.   else if the mouseH>=117 and the mouseH<=257 and the mouseV>67 and the mousev<217 then
  76.     if forw = 1 then
  77.       set pos = 2
  78.       cursor[1067,1068]
  79.     else if downOnly then
  80.       set pos = 4
  81.       cursor[1073,1074]
  82.     else
  83.       set pos = 0
  84.       cursor[1071,1072]
  85.     end if
  86.   else if the mouseH>=117 and the mouseH<=257 and the mouseV>217 and the mouseV<307 then
  87.     if down = 1 then
  88.       set pos = 4
  89.       cursor[1073,1074]
  90.     else if down = 0 and forw = 1 then
  91.       set pos = 2 
  92.       cursor[1067,1068]
  93.     else
  94.       set pos = 0
  95.       cursor[1071,1072]
  96.     end if
  97.   else 
  98.     set pos = 0
  99.     cursor -1
  100.   end if
  101. end rollCheck
  102.  
  103.